home *** CD-ROM | disk | FTP | other *** search
/ Chip 1997 March / CHIP Mart 1997.iso / SurfCam / SURFCAM.Z / FAN16P.M3 < prev    next >
Text File  |  1996-04-01  |  4KB  |  152 lines
  1. name Fanuc 16M with Tool Preselect
  2.  
  3. % 00
  4. / 00
  5. O >4
  6. N >4
  7. G >2
  8. g >2 G
  9. X ->3.>4
  10. Y ->3.>4
  11. Z ->3.>4
  12. I ->3.>4
  13. J ->3.>4
  14. K ->3.>4
  15. Q ->3.>4
  16. R ->3.>4
  17. P >40
  18. F >3.1
  19. m >2 M
  20. H >2
  21. D >2
  22. T >2
  23.  
  24. S >5
  25. M >2
  26. E >3.>6
  27. # >3
  28. w >3
  29. v >3.>4
  30. d >3.>4
  31.  
  32. ModalLetters X Y Z F R S M Q          # List of letters that are modal    
  33.  
  34. ModalGs 0 1 2 3 73 74 76 80 81 82 83 84 85  # List of g codes that are modal    
  35.  
  36. Sequence#s N 0 5 5                    # Char, freq, incr & start          
  37.  
  38. HCode X                               # X or X U  'Horizontal char.       
  39. VCode Y                               # Y or Y V  'Vertical char.         
  40. Dcode Z                               # Depth char.                       
  41. FeedCode F                            # Feed rate char.                   
  42.  
  43. Comment ( )                           # Begin End comment char.           
  44.  
  45. Spindle 3 4 5                         # Cw, ccw & stop m codes            
  46. Coolant 8 9 7                         # On, Off & Mist m codes            
  47. DComp 41 42 40                        # Left, Right & Cancel m codes      
  48. LComp 43 49                           # On & Off codes                    
  49.  
  50. Feed G1                             # Linear move                       
  51. Rapid G0                            # Rapid positioning word            
  52. Cw G2                               # Circular move clockwise           
  53. Ccw G3                              # Circular move counter clockwise   
  54.  
  55. Inc/Abs G 91 90                       # Inc & Abs char. & values          
  56.  
  57. CtrCode I J                           # I J or R or I J K L               
  58. Helical? Y
  59.  
  60. Spaces? Y                             # Y or N  'Spaces between words     
  61.  
  62. Incremental? N                        # Y or N  'Inc or abs output        
  63. CtrIncremental? Y                     # Y or N  'Inc or abs I & J         
  64. ByQuadrants? N                        # Y or N  'Break arcs at quadrants  
  65.  
  66. UppercaseComments? Y                  # Y or N 'Require uppercase comments
  67.  
  68. Drill                                 # Drilling canned/manual cycle      
  69. G81 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  70. end cancel
  71.  
  72. Peck                                  # Pecking canned/manual cycle       
  73. G83 X[H] Y[V] Z[D] Q[VBite] R[Vclear] F[FRate]
  74. end cancel
  75.  
  76. Tap                                   # Tapping canned/manual cycle       
  77. M135
  78. G84 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  79. end cancel
  80.  
  81. LTap                                  # Left handed tapping cycle         
  82. G74 X[H] Y[V] Z[D] R[Vclear] F[Frate]
  83. end cancel
  84.  
  85. Ream                                  # Reaming canned/manual cycle       
  86. G85 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  87. end cancel
  88.  
  89. Bore                                  # Boring canned/manual cycle        
  90. G86 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  91. end cancel
  92.  
  93. Back                                  # Back boring canned/manual cycle   
  94. G87 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  95. end cancel
  96.  
  97. Cancel                                # Cancel a canned/manual cycle      
  98. G80
  99. end
  100.  
  101. StartCode                             # Start of the program              
  102. %0
  103. O[Program#]
  104. End
  105.  
  106. 1stToolChange                         # First tool change                 
  107. G0 G17 G40 G94
  108. g91 G28 Z0
  109. G28 X0 Y0
  110. G90 G92 G53 X0 Y0 Z0
  111. G52 X0 Y0
  112. M1
  113. M6
  114. G[Work] G90 G0 X[H] Y[V] S[Speed] M[Direct]
  115. m56 H1 D2 M25
  116. G43 Z[D] H1
  117. T[NextTool] M[Cool] M26
  118. End
  119.  
  120. Infeed                                # Enable cutter comp                
  121. G[Side] X[H] Y[V] D[DComp] F[FRate]
  122. end
  123.  
  124. Outfeed                               # Disable cutter comp               
  125. G1 G40 X[H] Y[V]
  126. end
  127.  
  128. ToolChange                            # Secondary tool changes            
  129. M9
  130. G0 g91 G28 Z0 M19
  131. M1
  132. M6
  133. M1
  134. G[Work] G90 G0 X[H] Y[V] S[Speed] M[Direct]
  135. m56 H1 D2 M25
  136. G43 Z[D] H1
  137. T[NextTool] M[Cool] M26
  138. End
  139.  
  140. EndCode                               # End of the program                
  141. G0 g91 G28 Z0
  142. G49 M9
  143. G0 g91 G28 M19
  144. T[Tool1]
  145. M5
  146. M30
  147. %0
  148. End
  149.  
  150. Replace "w" with " "
  151. Replace "v" with "="
  152.